* lisp/gnus/message.el: Improve last commit

(message-clone-locals): Don't mistakenly match other variables whose
name happens to include "message-default-charset".

diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index f874a0e3b8eed2337218be0f7d16811b26a51a14..8212eeafa91da390a601b965ea0242297392d22b 100644 (file)
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -8063,8 +8063,7 @@ regexp VARSTR."
           ;; Cloning message-default-charset could cause an already
           ;; encoded text to be encoded again, yielding raw bytes
           ;; instead of characters in the message.
-          (unless (string-match "message-default-charset"
-                                (symbol-name (car local)))
+          (unless (eq 'message-default-charset (car local))
             (set (make-local-variable (car local))
                  (cdr local))))))
      locals)))